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SUPLEMENTO (SÉRIE MONITORES) 
O ASSEMBLADOR 


Este programa permite ao utilizador, partindo de instruções 
introduzidas pelo teclado ou de um programa previamente 
gravado em cassete, elaborar rotinas em código máquina, 
sem ter o trabalho de as codificar. 

É normal, para não dizer indispensável, a construção dum 
diagrama bloco que represente todas as variantes principais 
dum programa que se pretende criar. 

Depois começa-se por agrupar as mnemónicas que possam 
executar as funções que destinámos a cada rotina. E é neste 
ponto que o nosso assemblador se torna num colaborador 
precioso. 

Ele vai transformar essas mnemónicas nos seus respectivos 
códigos, carregá-los na memória a partir do endereço indica- 
“ do, desde que o utilizador se não esqueça de cumprir as 
principais normas que o programa estabelece para uma 
correcta recepção de dados. 

Cada linha de dados, que é sempre referenciada por um 
endereço, possui 4 campos: 


1 — Nomes (Labels ou etiquetas) 
2 — Campo da mnemónica 

3— — » de endereçamento 
4— » de comentários 


Os campos dos nomes e dos comentários são opcionais. 
O campo do endereçamento pode conter um endereço, um 
dado, ou estar vazio. O campo da mnemónica nunca pode 
estar vazio: ou tem a mnemónica ou tem uma directiva. 
A separação entre os diferentes campos é feita por 
delimitadores. 

O mais comum entre eles é o espaço. 

O padrão deste assemblador para delimitadores é o seguinte: 


o o: — Após um NOME. 

"* espaço — No campo da mnemónica, a separar a acção do 
nome do registo, do endereço ou do dado. 

— Antes dum comentário. 


Quando um nome é colocado no respectivo campo, o assem- 
blador associa-o ao endereço do primeiro código da mnemó- 
nica a escrever nessa linha. Sempre que pretender referir 
esse endereço, basta indicar o nome. 

Os nomes devem ser curtos e indicarem muito claramente a 
acção que se pretende especificar. 

O campo da mnemónica é sem dúvida o mais importante, 
visto ser o responsável pela formação do código máquina 
que o assemblador vai produzir. 

Em substituição da mnemónica, este campo pode receber 
algumas directivas, tais como: 


ORG (de origem) 

EQU (de igualar) 

DEF (de definir) 
A directiva ORG permite localizar um programa, uma rotina, 
ou mesmo um quadro ou tabela de dados, em qualquer ponto 


(Cont. dos números anteriores) 


da memória. Para que o assemblador associe essa directiva 
ao endereço pretendido é necessário que ela seia colocada 
como primeira instrução desse mesmo grupo. 

Exemplo: 


Pi: ORG 
E DE ORG 


50000 
55000 


A directiva EQU associa o valor do seu argumento (um ende- 
reço) ao nome que a antecede e também deve ser colocada 
no início de cada programação. 

Exemplo: 


GRAF : EQU 48000 


A directiva DEF é formada por 2 comandos distintos: 


| — DEFB 
É — DEFW 


DEFB Define um código entre (0 e 255) 
DEFW Define um código entre (0 e 65535) 


Esta directiva tem de ser utilizada sempre que seja necessá- 
rio introduzir dados nos respectivos endereços. 
Assim: 


DEFB 16 — coloca o código 16 no endereço dessa linha 
DEFW 23760 — coloca os dois bytes que formarão esse nú- 
mero, no endereço dessa linha e seguinte. 


O campo de endereçamento consente a entrada de endereço 
ou dado, representados em decimal ou hexadecimal. 


Exemplo: (endereço) 16384 ou 6400h 
(dado) 156 ou 9Ch 


O campo de comentários consente a introdução de qualquer 
tipo e comentário, desde que esteja antecedido de (;). 


Exemplo: : Último quadro 

O assemblador é formado por um programa em Basic, que 
começa na linha 1000. Uma vez carregado, ele vai pedir um 
valor para a RAMTOP, que se pode situar entre o mínimo 
indicado e o topo da memória, dependente, claro está, da 
quantidade de código máquina a utilizar. 

Como o programa pode trabalhar com uma Printer (escre- 
vente), quando formulada a pergunta, terá de responder (S) 
ou (N). 

À seguinte, «PESQUISA AUTOMÁTICA?», também a respos- 
ta é (S) ou (N), em que (n) corresponde à entrada do assem- 
bler pelo teclado e (s) vai introduzir mais 1 questionário. 
«Digase o programa está gravado? (S ou N)». Se a resposta 
for (S) pedirá o nome do programa para o carregar. 

A resposta (N) exige que o programa a assemblar tenha sido 
previamente escrito e esteja já à disposição do assemblador. 
Descubra você mesmo, caro leitor, a razão de ser destes 3 
formatos de entrada, quando pretende codificar o seu 
assembler. 


Em pesquisa auto, o programa quando encontra um erro, 
fará STOP, para que este possa ser emendado continuando 
a sua execução com GOTO 1020. 

Se estiver a introduzir o assembler pelo teclado, um erro 
pode ser emendado, repetindo a linha já devidamente 
corrigida. 

Como escrever um programa a assemblar no espaço com- 
preendido entre as linhas O e 999: 


1 REM (org 40000 
5 REM SALT 1:equ 45000 
10 REM SALT 2:equ 46000 
15 REM CONT: defb 31 

20 REM Qf1: defw 45800 

25 REM Q2: defw 45900 

30 REM Ld b cont 

35 REM Ld hl qi 

40 REM loop1: Ld a (hl) 
45 REM rst 16 ; rom écran 
50 REM inc hl 

55 REM dec b 

60 REM lLdab 

65 REM Cp O 

70 REM jr nz loop 1 

998 REM ret; final 

999 REM ) 


NOTA: Os programas podem ser todos escritos em minúsculas. Têm de abrir 


com «(» código 40 e fechar com «)» código 41, para que o pesquisador 
auto reconheça aonde começa a assemblagem e aonde acaba. 


Em execução manual, entrada directa pelo teclado, não intro- 
duza Os sinais de abertura ou fecho, bem como o número de 
linha e a instrução REM. Para terminar basta deixar a linha 
em branco e premir ENTER. 

Para gravar o código máquina produzido pelo assemblador, 
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De quando em quando somos solicitados a abordar uma das 
novas linguagens de que os nossos amigos começam a ouvir 
falar com insistência. 

Hoje cabe a vez à linguagem FORTH (pronunciar FORSSS) 
pouco conhecida ainda, quer dos amadores (que somos to- 
dos nós) quer dos profissionais; é preciso confessar que se 
trata de uma linguagem muito particular e em todo o caso 
bastante diferente das outras. 

Devo dizer-vos, à partida, que é mais fácil para quem não 
conhece nenhuma linguagem, aprender rapidamente a usar 
o FORTH. Quem já conhece outras linguagens, tem sempre 
tendência em procurar uma semelhança ou uma analogia 
com outra linguagem e esbarra com uma impossiblidade ... 
não existe paralelismo entre os conceitos do FORTH e, por 
exemplo, o BASIC! 

Para os amigos do Clube Z80 não é difícil a iniciação nesta 
linguagem pois ela está disponível para o ZX SPECTRUM ou 


“para o APPLE, TRS80, BBC, etc. 


FORTH nasceu nos anos 70, nos Estados Unidos e o seu 
criador é um programador chamado CHARLES MOORE. Es- 
te homem, dotado de grande engenhosidade, tinha necessi- 
dade e possuir um dispositivo que lhe testasse rapidamente 
os programas que projectava; como nenhuma das linguagens 
que ele dominava lhe convinha, Moore concebeu e escreveu 
o primeiro compilador FORTH. 

O nome da linguagem provém da constatação de que era de 
tal forma diversa das que existiam, que foi classificada como 
da quarta (fourth em inglês) geração. 

É interessante notar que durante vários anos, Charles Moore 
foi o único utilizador desta linguagem, num computador 
IBM 1130 e como esta máquina apenas podia comportar 5 
caracteres para um identificador, em vez de FOURTh ficou 
FORTH. 

Observando os conceitos e a forma da linguagem FORTH, 
deve constatar-se que em certos aspectos se parece com a 
linguagem máquina (daí a sua rapidez!), mas diverge no 


«sentido de que não possui as dificuldades de escritura nem 


as limitações ca linguagem máquina. Ela consegue ser 
linguagem programação interpretada, compilada, monitor, 
editor mesmo assemblador. 

O Compilador FORTH é extremamente compacto comparado 
com outras linguagens, pois vai de 2 Kbytes até 8 Kbytes 
(neste caso será já de luxo!). 

Este pormenor implica que também os programas já compila- 
dos sejam de tal modo comprimidos, que uma máquina Forth 
com 2K de memória RAM é equivalente a uma máquina 
BASIC com 16K. 

Forth é uma linguagem recursiva, particularmente adaptada 
as aplicações tipo multiprogramação ou tempo real (como a 
robótica, por exemplo). 

É uma linguagem estruturada; não é possível encontrar o 
GOTO em Forth mas, em contrapartida, podemos ter ciclos 
imbricados uns nos outros até ao infinito. 

Utiliza uma PILHA ou STACK para todas as suas operações 
e instruções; pilha esta que permite ignorar totalmente o que 
se passa na memória e onde isso tem lugar, pois que apenas 
a PILHA tem importância. 

FORTH é uma linguagem interactiva que vos permite testar 


imediatamente cada peça de programa dado que a maioria 
das «instruções» FORTH pode ser executada imediatamente. 
Podemos aceder à linguagem máquina sem qualquer dificul- 
dade ler ou escrever na memória ou num registo de circuito 
(trata-se sempre com operações elementares). 

A inclusão de programas em linguagem máquina no interior 
de programas FORTH é imediata e passa desapercebida de 
tal modo ela é natural e simples; além disso FORTH, dispõe 
de um assemblador integrado para facilitar este trabalho. 
Toda a medalha tem um reverso, FORTH não escapa a esta 
regra e possui as suas limitações. 

Inaptidão para o cálculo científico e dificuldades em rnanipu- 
lar grandes palavras . .. 65535 é já um número muito grande 
para FORTH. Não esquecer que as linguagens são sempre 
concebidas para... isto... ou para aquilo ..., portanto conti- 
nuem calcular os valores trigonométricos e o orçamento fami- 
liar em BASIC. 

Certos programadores dizem com uma certa piada, que o 
FORTH foi criado para ser escrito e não para ser lido, dado 
que existe uma certa dificuldade em ler os programas em 
FORTH. 

Quem resistiu até agora e continua curioso(a) vai ver que 
existem coisas interessantes; por exemplo esqueça as instru- 
ções e as funções! O Forth apenas possui: PALAVRAS... 
uma palavra Forth pode ser DROP ou ROT, mas também 
pode ser HOJE ou ONTEM ou ainda %?/3a llb que tudo 
são palavras correctas. 

De facto, para ser preciso, Forth dispõe à partida (quando 
liga a máquina) de um certo número de palavras contidas no 
seu dicionário mas isto não é limitativo e pode ser levado até 
ao infinito.... (desde que a memória também o seja)! 
Todas as palavras que tu criares são acrescentadas ao Dl- 
CIONÁRIO original, ou seja, falando em termos do nosso 
universo de Basic, podes criar as tuas próprias «instruções» 
que farão em seguida parte do jogo de «instruções» para 
posterior uso, não importa por quem ou quando. 


Estas palavras que tu podes criar são de facto programas 
FORTH; com efeito, escrever um programa Forth consiste em 
usar palavras do Dicionário, realizando uma função bem defi- 
nida e a «assemblar» essas funções de modo a formar novas 
palavras até obter a função desejada. Por outros termos, 
cosntruímos o nosso programa bloco a bloco e cada bloco irá 
realizar uma função bem definida, por ínfima que seja. É 
divertido pensar que o meu programa, uma vez terminado, 
será uma palavra que fará parte do dicionário e que pode ser 
usado por qualquer outro como uma vulgar «instrução». 
Dissemos atrás que FORTH usa uma PILHA, mas antes de 
ver como e porquê, examinemos de perto este conceito de 
PILHA. 

A pilha Forth está definida na memória RAM como devem ter 
percebido, mas a sua colocação (ou a definição dos seus 
limites) não nos interessam; o que é importante é saber como 
ter acesso à pilha em qualquer momento. 

Imaginemos uma pilha de folhas de papel à qual podemos 
juntar outras folhas ou retirá-las, mas sempre na mesma or- 
dem. Por exemplo, se eu tenho uma série de encomendas, 
devo satisfazer os pedidos pela ordem de chegada ... neste 


tipo de pilha, o último pedido a chegar será o primeiro a partir 
(satisfeito); trata-se de uma estrutura LIFO (last in last out). 
Por aqui se pode ver que a parte fundamental da pilha será 
sempre a camada superior (isto em sentido figurado). 
Esta Pilha vai ser usada por FORTH para guardar dados, 
constantes, variáveis dos ciclos, resultados; em resumo: 
TUDO! 

A PRIMEIRA PALAVRA... será PONTO (.) ou seja o DOT 
dos ingleses — o ponto serve para obter no écran o valor que 
está na parte superior da pilha e que será destruído mal o 
retiramos da pilha. 

Use o compilador fig-FORTH que está disponível para o 
Spectrum, reproduza do gravador com LOAD '''', e mal ele 
fique instalado, experimente: 


4 enter 3 enter 2 enter 1 enter 

A tua máquina responde sempre ok e vai colocando cada um 
destes valores no interior da pilha, pela ordem de entrada. 
Escreve agora o ponto e enter. 

Observa que terás: 1 ok novo ponto e enter e terás 2 ok, etc., 
ou seja, vais retirando os valores que havias introduzido pre- 
viamente na pilha. 

Quando a pilha está vazia e tentamos obter valores usando: . 
enter teremos a mensagem: 46.7 MSG || 1 que significa Pl- 
LHA VAZIA. 

Regras de Sintaxe > são simples, mas todavia é preciso 
conhecê-las. Podemos escrever dados e palavras Forth se- 
guidas umas às outras na mesma linha, desde que separa- 
das por um espaço. 

A interpretação das linhas FORTH apenas começa após o 
<enter> que é universalmente conhecido como CR ou Carri- 
age Return ou chr$(13). 

As palavras Forth que posso definir devem comportar no má- 
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ximo 31 caracteres que podem ter qualquer caracter ex- 
ceptuando o espaço, o caracter 13 (enter), o código 127 e o 
nulo (código 0). 

As regras de sintaxe limitam-se a isto! 

Observamos anteriormente que a palavra ponto (.) tem o 
significado do nosso habitual PRINT mas destrói o conteúdo 
da pilha. Entretanto, como pode ser útil limpar o conteúdo da 
pilha sem o projectar no écran podemos usar DROP seguido 
de enter e o valor que está no TOP da pilha desaparece, sem 
sair no écran. 

O compilador que o Clube distribui é o fig-FORTH Abersoft 
1.1, e embora as folhas descritivas sejam simplórias, existe 
um grupo de cópias do livro STARTING WITH FORTH. 
Neste momento Janeiro/85, os dados sobre utilizadores 
FORTH, ão os seguintes: 


EORCADAO sas a 2,4 % 
PROGRAMAÇÃO COMERCIAL ........... 6,3 % 
Ega pet o A DP NR 10 % 
AQUISIÇÃO DE DADOS/INSTRUMENTOS .......... 31,3 % 
SISTEMAS DE CONTROLO/ROBÓTICA .............. 50 % 


Um dos objectivos do Clube Z80 foi sempre o da tentativa de 
criar núcleos de interesse à volta das coisas novas da 
Informática. 
O objectivo tem falhado, porque nunca encontramos um re- 
torno. Se tu te interessas por FORTH, diz que estás presente 
e manda a tua colaboração. Não esperes por obra monu- 
mental, porque todos somos amadores, mas as coisas sim- 
ples, por vezes, fazem despertar outros temerosos do «ridí- 
culo» e avançar um pouco o mundo. Se não fosse a ingenui- 
dade de quem tem espírito criativo, ainda hoje se escrevia 
apenas com um pedregulho granítico! 

Um abraço do Clube Z80 


Para manejar com eficiência os seus programas, deve 
conhecer algo de substancial em relação aos números, e a 
forma como são tratados em Basic. 
Existem dois aspectos a considerar: 


1 — como o programador os vê 
2 — como o computador vê os números 


O modo como vê os números depende do formato que usa 
para a entrada dos dados numéricos, usando os comandos 
INPUT, LET e READ. 

O mesmo tipo de formato será usado pelo computador para 
apresentar os resultados usando PRINT e LPRINT. Existem 
três tipos de formato de interesse imediato. 


a) INTEIROS (números tais como -1, O, 25 etc.) 


b) NÚMEROS REAIS (aqueles que possuem parte fraccio- 
nária, tais como 10.625, -1.33,3.142 and 1/2) 


c) E formato científico (por exemplo 0.32E10 ou -1.683E-12) 


O Spectrum também permite que os números entrem sob a 
forma BINARIA usando o comando POKE, no entanto dado 
que esse domínio está ligado ao tema dos Gráficos Definidos 
pelo Utilizador, não será aqui abordado. 

Para entrada e saída de dados numérico, os valores devem 


ser atribuídos às respectivas variáveis. As regras de atribui- 
ção de valores são simples e conhecidas. 


1) Os nomes de variáveis numéricas simples (contendo um- 
dado cada), podem ser formados por combinações de 
letras e números, desde que o primeiro carácter seja uma 
letra. 

2) Uma variável numérica tipo ARRAY ou MATRIZ ou QUA- 
DRO deve possuir um nome formado por apenas uma 
letra, mas pode usar a mesma letra que tenha sido atribui- 
da a uma variável simples. 


SEó REM CONVERSÃO PONTO FLUTUAN 
a = 

Si INPUT x 

15 LEI iN=t 

jed LE; 5=S8G6H X 

SS) LET X=R85 

à) IF x:=2t32 THEN GO TO ig 
350 (LET N=245X 

155 LET ii=N+1 

Sd LP Xx:2t31 THEN GO TO 354 
2) sO TO sau 

dado LET K=m-2 

dio LET N=N-I 

dcô IF xXx:=2t32 THEN GO TO iam 
odio LET R=INT ix/256+43' 

Sds PRINT 2132: PRINT x 
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Pã LET X=k-256t3+a 
SyS LE; B=INT ix-2561%2) 
Slú LE? Nx=K-25E+t24+B 
Sed LET Ca=INT ix7256) 
ada LET Dbzx-256%0 
add PRINC CEXPOENTE="; 180-N 
59 PRINT C“MANTISSA=",A-ilzs+i5s= 
Ls Do SESC 
SEO GÓ TO Fama 


REPRESENTAÇÃO DOS NÚMEROS 


O microprocessador Z80 usa um padrão de 8 bits por cada 
BYTE (palavra processada). Entretanto observe que todas as 
representações de dados quer sejam números quer sejam 
caracteres, são guardados sob a forma de Bytes. 

Existem três processos que o computador usa para manipu- 
lar OS números e apresentá-los no écran: 


1) INTEIROS 
2) PONTO FLUTUANTE (vírgula flutuante...) 
3) BCD (Binary Coded Decimal) 


A aritmética tipo BCD é agora obsoleta, de tal modo os 
micros são agora concebidos, no entanto o programador em 


—Assembler sabe que o Z80 suporta este tipo de 


representação. 
Os leitore mais atentos a este tipo de pormenores, devem 
interrogar-se sobre o porquê de distinguir entre inteiros e 
ponto flutuante. 


Lô REN CEMONSTRACAD INTEIRO-PO 
NT FLUTUANTE 

20 INPUT 

SO LET Tã="F 
. 49 LET U=PEER 29362 SAFPEER 
me fm 

4s IF PEER iuy+l)=zd THEN LET T& 
porad É 

Sa PRINT O CNLUNEROD Co táso TIPO: 

So IF Ta&=“I" THEM PRINT “INTEL 
RO “CS BYTES: =“ 

a IF T&='Fo THEN PRINT ÕO' PO INTO 
PLUTURNHNTES O ExP HANT ISSA” 

sw FOR =) TO & 

ão PRINT PEC UU4xXi 

lãoa HEZT À 

llá SO TO ca 


“ADOS TIPO INTEIRO 


Um número inteiro será interpretado pelo BASIC do Spec- 
trum como um valor entre -65535 e +65535. 

Serão necessários 5 bytes de memória para guardar esse 
número inteiro, da seguinte forma: 


Byte 1 = O (não usado) 

Byte 2 = 0 (no caso de um inteiro positivo) 
= 255 (para o caso de um negativo) 

Byte 3 = Byte menos significativo (low) 

Byte 4 = Byte mais significativo (high) 

Byte 5 = O (não usado) 


Os bytes 3 e 4 guardam o valor inteiro. Em termos práticos, 

isto significa que o número N será retido na memória da 

seguinte forma: 

Para um inteiro positivo: Byte 3 = N — 256 *INT (N/256) 
Byte 4 = INT (N/256) 


Para um inteiro negativo: 
Byte 3 = 65536 — N — 256 * INT (65536 — N)/256) 
Byte 4 = INT ((65536 — N)/256) 


Como vimos, dois destes bytes não são usados neste tipo de 
representação o que permite ao computador modificar o 
conteúdo em vírgula (ponto) flutuante em qualquer instante. 


DADOS TIPO PONTO FLUTUANTE 


Qualquer inteiro fora da gama especificada para o Spectrum, 
seja real ou tipo E (mais de 8 dígitos) vai ser guardado como 
Ponto Flutuante. 

O sistema parte o número em dois, Expoente e Mantissa, 
com o ponto (vírgula) decimal «flutuando» de acordo com a 
máxima significância. Sob o ponto de vista do sistema deci- 
mal, o processo é facilmente entendido. 

Por exemplo: 


0.005679 = 0.5679 *10' 2 

— 0.5679 * E 2 
O que significa: Mantissa = 0.5679 

Expoente = — 2 

Os números binários tipo ponto flutuante são de difícil com- 
preensão, no entanto o princípio é o mesmo. 
O processo é demonstrado com certa «limpeza» no programa 
1. Do mesmo modo que o anterior, temos 5 bytes que são 
designados para guardar cada número tipo ponto flutuante. O 
programa calcula o Expoente (byte 1) e a Mantissa (byte 2) 
originando o número X. 
Com efeito, nós colocamos um ponto decimal binário, imedi- 
atamente à esquerda do primeiro dígito binário significativo 
(caso decimal). 
Em binário, 4 bytes são necessários para obter a precisão 
máxima, e então nós expandimos ou contraímos a Mantissa 
(isto em sentido figurado), simultaneamente, de modo a alte- 
rar o expoente (ou ajustar), multiplicando ou dividindo repeti- 
damente por 2. 


SETUP linhas 300 a 340 


INPUT X (número real) 

N = O (número de multiplicações/divisões por 2) 

S = sinal de X 

X = valor absoluto de X 

IFX<=2"32 (overflow dos 32 bits... 
ultrapassou a capacidade) 

THEN saltar para DIVIDE 

Continue com MULTIPLIQUE 


MULTIPLIQUE 


X =2*X (duplicar o número) 

N = N+ 1 incrementar 

FX <2"31 (primeiro de quatro bytes 
não está ainda activado 

THEN saltar para MULTIPLIQUE 

saltar para BYTE 


linhas 350 a 370 


DIVIDE linhas 400 a 430 


X = x/2 dividir por 2 

N = N-— 1 decrementar 
IF X>=2"32 (overflow) 
THEN saltar para DIVIDE 


BYTE linhas 500 a 530 


A = INT (X/256 " 3) byte 1 
X=X+A+-256"3 resto 


E e 
a O a a sr 
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B = INT (X/256 " 2) byte 2 
X=X-B+-256 2 resto 

C = INT (X/256) byte 3 
D=X- 256+C byte 4 


continuar com EXPOENTE 

EXPOENTE linha 540 

PRINT EXPOENTE = 160 — N 

MANTISSA linha 550 

PRINT MANTISSA = A — 128 (se S = positivo), B,C,D 
saltar para SETUP para o próximo X. 


O processo de expandir ou contrair a Mantissa transforma o 
primeiro BIT dos quatro bytes em 1. Não esquecer que esta- 
mos simular aquilo que o Interpretador da linguagem faz 
quando lê um número real, e nesse caso a máquina sabe 
exactamente o que significa activar um bit, de modo que é 
conveniente assinalar esse facto. Note que para números 
positivos, iremos fazer RESET do bit, ou seja, colocar O BIT 
em zero. 

Na nossa simulação, fazer o Reset do bit, será equivalente a 
subtrair 128 (2 ” 7) do número A. Deste modo, À será menor 
que 128 se o número é positivo e superior a 128 no caso 
inverso. 

Por diferentes razões, o expoente é ajustado de modo a 
equilibrar com idêntica precisão, se tratamos grandes ou pe- 
quenos números. Como o expoente é sempre um inteiro, a 
mantissa vai ter valor a partir de D — 255; este equilíbrio é 
encontrado fazendo o expoente do valor absoluto de 0.5 (en- 
trar com 1/2 no programa) igual a 128. 


Teremos então: 


IF ABS (X) > 1/2 THEN EXP> 128 e... 
IF ABS (X) < 1/2 THEN EXP < 128 


verifique que esta convensão dá: 


X= “W2 expoente = 128 mantissa = 0 0 0 O 
X = — 1/2 expoente = 128 mantissa = 128 0 0 O 


para activar o primeiro BIT dos quatro bytes, a partir de 
X = 1/2 teremos que incrementar N até 32. Por essa razão, 
quando N é subtraído desde 160 dará um expoente de 128 
no «ponto de equilíbrio». 

Esta polarização faz parte da convenção (tal como O bit do 
sinal) e pode ser usada intensamente. 


FAZER O PEEK DA ÁREA DAS VARIÁVEIS 


O programa 2 serve para demonstrar o facto de que inteiros 
e números reais são guardados de forma diversa. 

O programa mostra como se guarda um número na área 
denominada VARS (da memória). 

Ele dá os 5 bites como representação de qualquer número N, 
no entanto teremos de olhar para a bandeira ... o primeiro 
byte será zero se o número é inteiro. 

Assegure-se que o número N é a primeira variável guardada 
na memória, executando o comando RUN, que limpa toda a 
área das variáveis. 

Teste, por exemplo, o número 1200 e obterá: 


inteiro com 5 bytes: O 0 176 4 0 


Experimente agora o ponto flutuante usando 
N = 1200.00000001 


MANIPULAÇÃO DOS NÚMEROS 


Será bom conhecer como ficam guardados na memória os 
números aos quais estão atribuídos valores «literais» dentro 
do programa. 
Por exemplo, LET A = 5... DATA 201,193,657... FX=> 3... 
FOR Z=1 TO 10... LET R= R+1, etc. 
Todos os números presentes nos enunciados descritos aci- 
ma são LITERAIS. 
Cada vez que um literal é lido pelo BASIC é imediatamente 
convertido na representação tipo inteiro ou ponto flutuante. 
Mais precisamente isto é executado cada vez que é encon- 
trado um enunciado contendo literais. 


PRUOGRANA E 


lã REM programa PEER 

2o LET At ada pit 

SO GO TO dia 

dia CATA 3,5 

So PRINT 'POS. CLiTRE IJZ2; "CODE 
5 LET ii=PEEr 23635 +2565 +PEEKR & 
630 

Bia FOR x=U TO d+riag 

“a PRINT x; TAB lO, PEER x 

Sd MEXT x 


PEEK DA ÁREA DE PROGRAMA 


O programa 3 ajuda a compreender mais alguma coisa sobre 
os literais fazendo o Peek da memória (extrair o valor contido 
numa posição da memória). 

O programa analisa os primeiros 100 bytes da área de pro- 
grama da memória). 


1) RUN do programa, e entrega na saída até obter um CO- 
DE = 3. Isto significa ENTER e marca o final sa primeira 
linha REM. 

2) As 4 posições mais próximas contêm o número de linha e 
o comprimento da mesma. 

3) Os 5 bytes representam as 5 teclas representativas de 
LET Z="0. 

4) Pode ver CODE = 14 que significa o Flag do número. 

5) Os próximos 5 bytes contêm o número 10 em formato 
inteiro. 


VENDO E TROCO 


Programas para o SPECTRUM 48 K 


Contactar; LUÍS CAÇADOR 
Rua Miguel Bombarda, 105 
— 2830 BARREIRO — 


VENDO SOFTWARE ZX SPECTRUM 


Desde utilitários, passando pelos educacionais e 
pelos jogos até aos filmes (DEUS EX MACHINA). 
Mande 20800 para a morada abaixo indicada e 
enviar-lhe-ei a lista de programas. 


MÁRIO SANCHO SOARES M. GRAÇA 
Rua Cidade de Vigo, 182-2.º . 4200 PORTO 


CLUBE Z 80 raia e os ra de cin e cias a e im ama — GEntncaiAs cia cri G 


Autor: Fernando A. Moreira , 


V. N. DE GAIA 
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mos iguais. as PRINT AT 14,60;"Av;AT já,10; 
s E 1 » 88 qm 48 Ea e 4-4 Ti ada fe 
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FEAR PS REFERENTES Há idisisio à PRINT Hi 2Z.t:. 
sita o UIGROoOCúnTonNta Cum INES 
Fis fer o RR “Em ai E E “E RES. IR E INT HT Ê pre A MLS Rita 
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Purighrt 1585 S2GO PRINT AT S.B/CRA=0; -.EsPal: 
à PRiNT o ESTE PROGRAMA  PERN ATO 3,3, Tã=0;-.0EB+PSL:;AT ig.a CT 
ITE-LHE CALCULAR AS REACCDES BE=";-.B54PsL;AT li.B;"RB=";.554% 
NUS  APOTOS.o, 0S ECSPURNNUS LORT PaL:;AT 11,9:,“TBD='"; .SB+4PÍ+L;AT 13 
Mico E q FMORMERIOS REPEREN: 0; "RE=º: «BS4PaL; AT 12,9, TÊE="; 
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S,29: CLS MZ LST Ill.gl.cMNC=]; e. BSFPALSLESAT 
do PRINÍ CCRRGA EM RB.BL É CO- 13,21; CME=" OsPsLal; AT 15,21, hM 
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has cm gar ca fa! ta Êo E eo CS += 7 26 Eta E o, PESE RE açaá . q — 100 3 . 
3020 FEINT ET 3,0, E is AB RPaLA 14,04 0TÕD= sodio 
& di A i iã = i qa us Ms Pio E Ler Sis mi l&,S: Ei 
E ES = ss . poe fes, Sesi ga RR 0-2 e Rea 2 ER > Cica ca 3 -— 
025 PRINT BT 4,GLCAVLAT 4.IB.0E CE=0, .SS34PSL AT dS,5, doveiicas 
o. qem . De A A ES E = çê a 8 e Pos dedos dm de RA Ela TIA ido ei; mil=o: «DOS FPEL, RT 
ih o & 454 CUCA AT dida, do cmi Mod ia, 0, "PTD=";.35853+ºP+L;AT 9,2. CHA 
tar a agr 0 E ph isa spo Rr do M=O a dada 
3027 INPUT CcaDCaA P="P. INPUT = ORE SLSLIMO das O CAT 
VM Leto É ii sia Leito iS,0d; Mis bit Sa 
3050 PRINT AT S,D; “CARGA P=":Pã E a E O 
* RBAMP;AT S ,86) CORO Le;LE; "NM mma Bando Er Sa avipa É - 
; qa id com Go ds iersd FRANi o o, Limit Ti dem 
a260 PRINT AT 5,0; "RA=", a GOS+P+ RGF 
AT m,o0: "Theo; SoJ4P FL, AT lã,G," st Eno o REFAnES: 
BE=";-.6173PaL;AT 11.0; CRB=:d. 308 PRUSE B&B. CLS so TO ds 
SsPaL;AT 11,8) TED=";.5S9+4PSL, AT sala PRINT AT 2,6: 
13,0, "BC="; .455PaL; AT lE,9: TCE E = 
"SL LFRPaL;AT 13,9: CTLD=": «BSS Solo PRAN) Mi Ls, 1tRILIAIIACAA 
sPzL:; AT 1á,6;0RD=";-.0354P&l,;AI E ams Ci tita rr . 
14,35TDs"; -,053+:P5L; AT 9.21, HA EBeg PRINT AT 3.0, E E 
Beat iP,21,"MD=B';aT I10,.gÃs HE E LE 
=", , Ji3sPsLSL:AT 11,21, CNU= 4-8 025 PRINT AT 4,B;CaCsAT dá,id: E 
ES sl sis AS Dl: CMES, «UA PAL “ET Ao, 497" sl ER = a E 
=isaATf 15,21) “NO=; DAPrRLELGAT E Sar 2; KBZM", AT AS er AT é, 486) CF 
Zi MPE", ass RLL AT 3,24, "B 
322a PRINT AT Za.B:; CiRR E Tt EM ger INPUT DaARGEO P= E THEUTOo: 
RGF su L=:L 
rm Et RsPFaAra! =350 PRINT AT 5,0, CCARGA P=".P 
338O PAUSE G. CLS co TO SU + EsMosRTo 5 Edo Le ais TA 
aid PRENT RT 2a; 

S2ga PRINT AT 5,8; CRR= cSSSPai: 
cais PRINT HT 1,40 ES ENIN IA! ST 9,9, TR=0; «45FPal:;ni lg.S. TE 
EEE , E = ..Ss:PsL:;àT 12,8; 0RB=";.5S5+P+ 
BED PRINT AT 3,8: É E Li? 1ãi.9, Tob=”, BSFPALIHI dosb 

= o o El=0: .55sPsL;A j2,.3, "TCÊ=":.0 
.B2S PRINT BT 4,8;0AC:AT d.ia. E SP ELIAT 13,9; "Túbe"; =, DSFP FLA 
“AT a,i19;C0CUAT 4,25, CBS AT D,d 1d Ro “RD=", dBJPSL;AT Ilá,5S: TE= 
GP KGZMOGET 4,5, E GRI ds dDs "PF ".dSsPSL/AT a,2l;CMA=0U-AT ID. 
AT add: o 1CMD=D";AT 10,21 ME=O; -.Do+Pal 
ger INPUT COARGA P=0.F INPUT pr ii estive": -sBSPPaLAL: Hi 
VAU L=":L LS, 04, “MES”. LODPaL SL. AT 15,84; 
.a3B PRINT ET S,B; CARGA F="P& dl=":  LoBsPaLsL;AT lá,al:CMFSO, 
e RGAMNCGRT E Ego. CUVAU = LE. PsreaLsl 
22350 PRINT AT EB.m,CaRR E TT Ei 
«DRA PRINT AT 3,8; CRA=0; «0334 Poa 
LaiRT 3,9, “Th='"; -.«33+PaL, MNE lg,s mM Er Go xHoS 
""TBE="; .B3SsPaLiAT lido RES. 3a PRUSE e E E co TO sa 


Apresentamos um programa capaz de calcular o comprimen- 
to mínimo de cada um dos pontos de um «GRAFO» relativa- 
mente a um ponto de referência. Este tipo de problemas tem 


grande aplicação, quer na resolução dos problemas de cáleu “1 BORDER O: PAPER O: INK 7 ea 
lo de custos de transportes, quer no fixar de itinerário — IB REM calculo de percurso min 
óptimos 1 mo Cu maxi 
ao REM entre dois pontos de um 
14 7) A 91: Pa ma. E E aa de is am 
NL ] x. 4 REM inicializai 
INPUT “Numero de “nos do q 
"a 
DIM Xini: DIM Fihah) 
PRINT “Seleccionar: 
PRINT : PRINT “1 - Percurso A 
minimo”: PRINT o: PRINT “2 - Per 
o maximo 
PRINT AT 19,9;"": INPUT nu 


É ; RE 
IF RE<i OR RE>2 THEN GO TO 


TF RE=1 THEN GO TO 110 
G0 TO 160 
110 CET E 

4 “aDA“NO” : 120 FOR I=2 TO k 
E DS Leio O 150 LET KiIi =i0:EXP 10 

jãO NEXT I 

7 GO TO 2oDe 

LEO REM atribuir zeroa cada no 

percurso minimo 170 FOR 1I=1 TON 
NX4:3 ? LET Rill =4 
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REM UALOR CE CADA ARCU 
FOR Tsi TO N-d 
FOR J=2 TON 
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CLUBE Zso 


234 READ Til, 
to NEXT 
250 NEXT IT 
26a REM TRATBMENTO 
2e7a FOR I=i TO nN-l 
26a FOR J=2 TON 
299 IF TíIl,Ji=á THEN GU TO 360 
so à1F RE=1l THEN GO TO Sia 
395 GO TO S20 
DO E ipnea THEN G& 
36 
SO TO 330 
Jr XIV) =X LILSST LI, Ji THEN G 
350 
LET Xl =X TIL) ATO]; 
TE 14=5 THEN GO TÓ SEU) 
LET =: IF RE=z1 THEN LET +) 


IF RE<>1 THEN LET J=ê 
NEXT od 
IF RE=1 THEN LET J=z0 
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Autor: Paulo Metelo 
ODIVELAS 


“Este programa é dedicado aos radioamadores que tenham 


antenas direccionais e que queiram orientar a sua antena 
através de coordenadas. 

O programa fornece a direcção do (QTH alvo) a partir do 
(QTH local), pela via curta (short path) e pela via longa (long 
path), isto tudo de O a 360º sempre no sentido dos ponteiros 
do relógio, a partir do norte verdadeiro. 

Além disto tudo, diz-nos as distâncias entre os dois pontos 
para ambas as vias (curta e longa) em quilómetros. 

As coordenadas dos dois locais são introduzidas da seguinte 
forma: aaa.aab ou seja: exemplo — latitude de 25º 45' Sul 
vamos introduzir 025.45S. Se a longitude for 005º 39' Oeste 
vamos introduzir 005.39W. 

NOTA: É muito importante que se usem as letras «S» e «E» para Sul e Este 


respectivamente. Pois sempre que a latitude for Sul e a longitude for 
Este o sinal dos dados é negativo (linhas 55,80,125 e 175). 


Sempre que a longitude do alvo e a longitude do local forem 
iguais o cálculo será impossível mas isto é remediado pela 
(linha 173) pois é somado 1.10-9 rad. à longitude do alvo. 
É possível calcular a direcção de qualquer alvo distante de 1 
minuto de arco, cerca de 1,8km do QTH local. 
Para saber as coordenadas a introduzir deve consultar um 
Atlas, pois geralmente estes trazem as coordenadas e assim 
será simples de as saber. 
Linhas (35,60,95 e 140) Transforma graus e minutos em 
radianos 
Linhas (50,75,120 e 170) 
Linhas (55,80,125 e 175) Sempre que as latitudes sejam Sul 
e as longitudes Este, o sinal dos dados é negativo. 
Linha (122) Para determinar a direcção dos alvos sobre a 
linha do equador. 
Linha (173) Torna o cálculo possível quando a longitude do 
local é igual à longitude do alvo. 
Linha (247) Torna o cálculo impossível. 


À REM Orientacao de antenas 
na RE programa adaptado da TE 
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HT Q, Os “ESEMPLO: Ei 
dos po o 


>ara a LONO . la 2WUm ceszte 
= Wii lo. Su e ihpor-iantie Utiliza 
' 35 Leivas e E Ce cc ft tra 
iuscuias para sui e ESLE TESP 
Eeciivamente. E cConven 
ente que a Drientacao “eENnha Em 
Rarustculas. AN,3,E,W) 
= POUSE Sad. CLS 
X LEI KsPiriSu 
lá LET u=FI-10508 
Eú LET ás 
so LET bi="" 
O PRIME Nº Rabo ORIENTACAS Lº 
E ANTENAS GAT 2,3; Lat. tocalo;A 
| E.lS,as | 
io IF agidli='"*" THEN INPUT 
IP LEN aâe:r? THEN GO TO 20 id 
du IF a&="" THEN GO TO 20 
45 PRINT AT 2,.15,a6; AT 3,3:"t0 
na.local“; AT 3,15; b$:AT 15,0; "5 
RaCOS aMPOnRE STS o a 
tg) | Lat=UML a (TO 3) Lx +4UÊ 
agis TO Gi su o Rag 
| ns Le abid)='5s THEN LET Lal=- 
Cia IP bãáili=" THEM INPUT bã 
ES IP bã=" THEN GO TO 25 
ca IF bã="E THEN GU TO 26 
ÉS ra es are THEN sU TO 2S 
E ) Lrmi=iVAL E 0 Si saw rua 
E iS Fo Ei sa boi T Si ra ri 
ia 1 RL E THEN LET lfhtias 
IR? 
6S LET cgã='7 ' 
So PRINT HT 3,25, b&; AT S,3;"La 
ta alvos AT 5,15; cã 
dão INPUT cá 
ljQ IF cs=])" THEN GO TO 95 
AUS LF cCês"E THEN GO TO 25 
llú IF LEN céá<>? THEN GO TO 95 
lz=y LET Laa=UAL Cãi TO 31 ax+UAL 
CRIS TO Gi su 
ii2 IF laa=ô THEN LET iaa=1E-3 
e” IF c&iZi="S" THEN LET laas= 
Bd Fe | 
130 LET dg='"* a 
130 PRANT HT 5B,iB; CHAT E,3;" Lo 
ng.alvol; AT SB,15;95 
o lJdQ INPUT dg 
l&3 IF dã&="“ THEN GO TO ldú 
10) IF dasE THEN sO TO BS 
155 IF LEN dg<>7 THEN GO TO 130 
lEW PRINT AT 5, AS:d&: AT = o SR: a 
E Ca CORRECTOS o ENTER ani 
ip LET na AL dai TO Gi J 
dGisS TO Bixy ? cia 
173 IF Utna=zini THEN LET inazina 
+12 -& 
ArS IP dalei="E" THEN LET ina=- 
Lia 
l&w INPUT ug 
163 IF o ug="Eo THEN GO TO Il34 
168 BEEP .Db;,54: BEEP .8,28: BEE 
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P 13,15 E REM BUNNIE - ESFEUSS 
158 FOUR :“=6 TO Gl 18 ELS PiOT IBS.,2 
1945 PRINT AT 7,4; CHRã dz gy DRRU B.iol 
bw NEXT 4 32 DRA 18,-& 
ala PRINT HT 19,0," E io DRBII 18.d 

AT 19,18; "CALCULANDOC;AT 19,20; So DRE B,-1E 
215 PRINT AT 21,0;" & DRGU -18)D4 
Seu LET L=lni- Lnia Er SÉ ch sc pgpes paço E RS 
225 IF Ll:<-FI THEN LET L=i+2+PI MA o a ande to = 
230 IF L>PI THEN LET L=L-2+PI SS cd e a LR 
245 LET F=ATN (COS L$1l«TAN Laal 138 CRAU d.2dá,-PI-3. 
ed? IF CÚS (Lalt+fizô THEN GO TO iig DRA DO De. -FIcDOoO 
ágio iso DRA -Di.FB,-PICE.s 
230 LET C=ATN i(TAN La5IN Frlos 160 ERALU Ze, -2S.Pi-ig 

ilai+F11 ld LRALU SE.-DS,-PIL-E 
£oS IF Ll>d AND c<d THEN LET c=c 188 DRE 2ZPá,5B,-PI:3 

+EI 16» DRAW. -16,-S2,-PIvsB 
Sue IF L:0 AND c>0 THEN LET car RR DROU E.-PB.-ÊI:a 

+P E. Rum Ea CE Ce em 
265 IF Led AND col THEN LET co e OR O 

+2*PI Ds do So 

SO LET Cstrizx oc dada sá ds Da 
275 LET d=ACS (SIN lalz5IN Laa+ 00 PLOT izé é 

COS Lals0C0OS Laascos Li 16 DRRO E.oo. 

200 PRINT AT 9,2; Cdireccao: SAT Seb DRAW SE,6 
lisos Via tuífias “IM tT; G o"; 280 DRAU E,-E 

INT (Cic-INT ci:60%2)22," MIN ” df DRA -D2.-5 
285 IF c>160 THEN LET cil=c-150 by CIRCLE lgl./z,3 A 
ad LF ci=180 THEN LET cl=c+150 O STOP 
evo PRINT AT 122,3;“via Longas * 

INT Clio is CL iNT itici-INT CL) x6 
aj ado h a 
300 L 
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PRINT ET Id.2,“distantcia cs; 
3 Vi á curta [Ce » $ - 
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PRINT AT 17,5, 
art E. ç 

FOR j=zD TO 34 

PRINT HT 13,4: CHK5G do 


Muitos jogos gravados em cassete nos têm sido envia- 
dos por alguns de vocês, por troca ou simples oferta. 
Embora tenhamos uma enorme lista de programas sem 
instruções desejaríamos o seguinte: 

Sempre que nos enviem programas, façam o possível 
por enviar as instruções ou mesmo um descritivo que 
facilite a sua utilização. 

A seguir enumeramos uma lista de alguns dos jogos que 
possuímos, mas sem quaisquer instruções. 


NEN rss ANSA 


Det ud Ed a do= “to 


“e CAMPUS Po po 


e 
Mm 
= 
m é 
T! 
% 
a 


“baf a; “pa 


E 
! 
E. 


LUEs CN 
x 


x 
IF uB=]NO OR ug="n THEN GO 


“4 


is Ti E al) 


PRINT AT l2.GB;"calecuio jmpa 


ERR AR O a RS 
pt Ea tn ft pis. +. lu Ed 


a 


R. C.VILA NOVA DE GAIA 


O COELHINHO DA PLAY BOY 
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White Ligthning 


Magic Mountain 


Space Station Zebra 1984 


Jumbly 
Velnor's Lair 
Bedlam 
Groucho 


1994 
Magic Meanies 
Voyage Into The Unknown 


Agradecemos que, se conhece algum deles e se lhe for 
possível, nos envie um descritivo ou uma cópia das 
instruções originais. 


VENDO SOFTWARE ZX SPECTRUM 


Desde utilitários, passando pelos educacionais e 
pelos jogos até aos filmes (DEUS EX MACHINA). 


Mande 20800 


para a morada abaixo indicada e 


enviar-lhe-ei a lista de programas. 


MÁRIO SANCHO SOARES M. GRAÇA 
Rua Cidade de Vigo, 182 - 2.º 
4200 PORTO 


CLUBE Zm = FO?! YXZHÊES TT] ET EEN 


Autor: Pedro Azevedo 20 INPUT «Indice da raiz»;A:INPUT «Radicando»;B:INPUT 
Foi publicado na revista de Dezembro de 84, um programa «Elevado a potência»,C 

para cálculo de raízes de índice superior a 2, por Carlos 30 PRINT AT 0,0;A;AT 2,5:BTC:PRINT AT 2,9;«=»:PLOT 
Moreno para o Spectrum. E dito junto ao programa que o 0.166:DRAW 10,0:DRAW 5,—20: 

Spectrum não tira raízes de índice superior a 2, o que é DRAW 5 .25:DRAW 50,0 


verdade, mas como um número elevado a uma potência frac- 
cionária é igual à raiz, sendo o índice o denominador da 40 PRINT AT 2,10;Bf(C/A) 


potência, desse número elevado à potência do numerador, 50 FOR N=0 TO 500:NEXT N 


o e cê 60 PAUSE 0:GOTO 10 

à o =/ E NOTA: Por exemplo, quando se quer calcular a raíz cúbica 

de 27, com este programa dá-se os seguintes valores: 

Este caso o Spectrum já executa sem problemas e com a Índico da riz=d 
mesma rapidez que executa qualquer outra operação. Radicando=27 
Não há qualquer intenção de tirar o valor do programa apre- 
sentado por Carlos Moreno, que dá mais 2 casas decimais 
que o Spectrum, mas que para aplicações práticas não são 
necessárias, chegando o valor apresentado pelo Spectrum, 
“”, introduzindo o seguinte programa: 


10 PRINT AT 0,0:«A»PLOT 0,166:DRAW 10,0:DRAW 5,- 2! 


Elevado à potência=1 


Este programa pode ainda ser melhorado com as seguintes 
linhas, o que evita que dê condições «Matematicamente im- 
possíveis» e as habituais mensagens de erro: 


IF A=0 THEN GOTO 20 


20:DRAW 5,25:DRAW 50,0: 22 IF ((INT (A/2)) <> (A/2)) AND (((ABS b) <> b AND ((INT 
PRINT AT 2,5:«B» (C/2)) <> ((C/2)) THEN GOTO 20 


Autor: Paulo Metelo o 
ODIVELAS O ade E Ra ad = EN po 
| | = usa AT SB. cs CALCULO DE 
Este programa é dedicado àqueles que gostam de fazer os TRANSFORMADORES +: PRINT AT E, 
seus próprios transformadores de alimentação. Ti 
Com a simples introdução de alguns dados ele vai-nos dar o a PRINTOAT Cd, rsrsr rrgars 
: ur ei EREFEFFEPELEPEELE 
numero de espiras do primário e dos diversos secundários, S PRINT AT 3,6, "Este programa 
para além do diâmetro e secção dos seus fios, dá-nos  tTalcula a potancia indivi: dual 
também a secção do transformador, a potência total e a po- Ea gt a di dação in” dE nave À da a 
RE Pei pr Ssettaso do nucleo, > EBpitas q 
tência individual dos secundários. O Fecundario e do sríinpario, OS 
Este programa no cálculo prático está concebido para uma Oi Cas E a SECCORS dOS SEUS TES 
; ; LeLTLIVIAOS ris « 
frequência de rede de 50 Hz “CS PRINT “Alei 1 dá-nos 5 
PRINT Hlzm disto da-hos a 
, Existem duas possibilidades de cálculo, uma prática e uma estolha à dito d ê (CU fo Pral : o E Fi | 1 
Já ; ; EU Ita ava atefi E Ulm aDE La 
teórica, se quisermos dá-nos também uma tabela de fios de da qa PR 
cobre que tem uma gama compreendida entre 5"” e 6,57” Em D5 calculos praticos 
ê dar nado 330 feitos "a tu PEqU 
para além da secção e da resistência em ohms/km ou aa O ae de E AURSESSSAS 
ohms/m. * PAUSE Z9a:. CLS 
Tem ainda a possibilidade de escolher entre três qualidades e a A o ADO Pi Bra th 
a gv q a PRINT AT 19,5, Quer um cale 
de núcleos (lâminas comuns, de silício e núcleo de ferrite). Ulo teorico ou “. PRINT AT 12,3 
Vão ser pedidas por duas vezes as tensões secundárias e + pratacos Lisp) 
suas correntes, a primeira é empregue no cálculo das potên- la INPUT ag 
cias a segunda no cálculo das espiras, diâmetros e secções to so das P UR ag= Fo THEN GU 
“ . “ - -— À 
do secundário, portanto das duas instruções de dados, os la IF ag='"t DR ag="T' THEN GO 
segundos deverão ser iguais aos primeiros. Tó logia 
4 a PRANT AT Ild.a. "Erro na antr 
E para terminar muito simplesmente, aqui estão as partes em odUção da opecão *. PRINT AT dê, 
que se divide o programa: 3: CIntroduza novamente a GpCcaDd. 
Linhas 1a 7=instruções de funcionamento li É Pa SE BE arte TU Ss 
pose o 1S CUL3 o: PRINT AT d,Z; Quadro 
Linhas 8a 165=cálculo prático da inducad nagnet ila em Weberom 
Linhas 1000 a 1049=cálculo teórico So: PRINT AT é.O0. “Para taminas c 
Linhas 2000 a 2045=tabela de fios de cobre RO quis S; EE a RAR RA 
j à, Fara laminas de silicio 1.2 1 
1 REM calculo de transtormado come: E ed ca] li.9,“Fara nucieo 
ES de fervite B.3d dem 
o PRINT AT 3,0, $+LREPEFEFRIS 19 LET Pl=a 
cprrrrrrrrrrrrrdarr o PRINT AT do, do INPUT Citensãao do primario e 


14 


CLUBE Zso 


+ 
meme" 


a vp 


volts : ain E 

30 INFUT C“inducaDd magnetica em DC. do transt. Em Lhe =. 
uebercme Cb ico PEIN À 

o Lola) loZ? LET Pri=ziidagósvo-idcdixrF+ras 

ga INPUT C“auantos envrrioiamento *b11: PRINT C'gexpiras do primario 
>: tem O SEC. CER “pri 

Sa INPUT Ciensao andividual do ides LET dp=a.7554R dpitrvpi PRI 
secundario em valis iu NT Cdiã. faro do Pri. mh = «ap 

Sa INPUT Crcorrente indivi dual lazi LET sp=A."5Erapto. PRINT = 
do secunda. em amperes : É es tro do Dri. Gihte,RA 

So LET nsx-L 1úss INPUT Cauantos enTroiamento 

EO LET po=vãki: PRINT pot. do . temo sec, “i:iw 
enrrota. Csn:o em W = “s,PRO ligas INFUT tensão indi dita ão 

ES LEI PLt=Pt+PO ecutidatro am altas ds 

ty LET Kx=x-2 193% INPUT corrent LE individual 

Ss IF x:>)8 THEN GO TO SU d JECUNda. Em amperes ça 

Do CR LOCO LEI 7 =x 1 

, a PR 


E 

INT Cpot. de todos entr. E 
t 

i 


El (ul 


H 
CTV Em E 


OS LET 8=1,.535450R pt: PRINT E 
El. do trans. em Cm zoss ivgdA LET ecz=ivevpizpri: PRINT E 
Sa INPUT “quantos enrrotamento Lpiras do sécunda.C,Zs0= “,e8 
8 teh O SET. 5X LUA IL LET ds=0,.7450R 1º PRINT “di 
as INPUT “tensão andividual do a. do sec.e“sr:Ccem nm =“: ds 
SsecCundario em volts Cau 10453 LET seza.7SSsdafoa A TREE “Ea 
> INPUT “corrente indios idlual té. do SBT. E: ER Chêscee 
da sECUunda. Em AMPErES NE 1945 LET x=x-l 
iBe LEI Zzakx-l jad?7 IF x<:8 THEM GO TO 19535 
1803 FRINTO. lgda G0 TO ldd 
| A 2900 REM tabela de fios de cobre 
105 LET eszid5,a/-8xbl sv: PRINT 2001 CLS 
espirasz do secundaçóizo = 1€S 2202 PRINT AT Ba pCsrsrrrrgrgtrs 
jlã LET daza.FSS3O0R à: PRINT “á rrrrrrrssrrrrrrççrrrl: PRINT AT do, 
a. do sec.lsz. Cem mm = 405 a, 
115 LET se=a.7585+dsta: PRINT 5 "o: PRINT AT 5,0; “& TAREEL 
El. do sec.l;z:;o em UCmds= "4,5 RR DE FIOS + Co PRINT AT E 
cú LET x=x-L 0," * DE COBRE 
Es IF x:>+58 THEN GO TO 95 &": PRINT AT 7,0, + 
cê PRINTOoo FTC PRRIN, MI O 


E e e ie e e ca ae e AR e A e A A A o A A e A o Re 


Cpo pote 


20; * 

o LET pPristiddas.iAALS DI) RM : PR e 
INT Cespiras dô PrILMAria E ES. 2ny4 PARUSE 154. CLS 

lia LET dp=0.74:50R ipt-vp): PRI 20906 PRINT AT Ba, Dia. mi Se É 
NT “dia. fio do pri.cmmha= Cs dP . AME Resi. ohms" 

láã3 LET sp=0.785:dpft>D. PRINT “a 2007 PRINTO" 
Bt. fio dá Pri. LmEes-CriSE ” 

jEQ) PRUSE ida. Cis cds PRINT as DATAS 
155 PRINT AT ld,3, "Quer uma tab O. 9] «0E «BASES 
e La Ea E E . PRINT HT LE Em 13 a? BASES 
3S,“Ffios de cobre? issm ADO «E DIAS 

INPUT by 3.4B Na “BOBS 

155 IF bg='n" OR bã=]"NO THEN GL Es TO bis «aÚATES 
TO & Eos «15 E 
1E3 IF ba='a0 OR bg=050 THEN GO 1.55 «Li «15d 
160 PRINT AT ia, CErro na intr 393" 
Ddução da DPIcCIoO” PRINT AT 12,5 eViA PRINT º. 25 «aQEgúil 
“Introduza novamente a opClad.” «373 : LO «NZSd 
165 PAUSE lyd. GD TÚ 156 1D8S = ri «ÚZIid 
lago REM Calcuio tedorico Dr o) 338] 
lagil Cis PRINT AT 4.2. "Quadro «450 so «BSGI 
da indiúicaoõo magnheiica Sh de Ber cm : S5D Es «DELE 
et PRINT AT *T,a.CPara laminas «28d = SO Rs Rd 
Dmiim Es L dcmael. PRINT AT Ss, «245 Pe pe, DE 
Ro'Para iaminas de silicão dl.oe Ud 1215 € SR «VIE S 
mel PRINT AT 1li,.B,.C'Para núcieo . 182 .35 «1134 
de ferritae gd.3d eme" à ASA E Rn] «1257 
Log LET ptza x o 
iagaá INPUT Ciensão do primario E 2015 PRINT “.da «1385 
mo vOLTS CivÊ « 126 4 + 1EãQ 
iags INPUT Cirequericia da TEJE E « LB EA. «JEiB 
à HZ CC; F «0967 «É «1963 
iúGa INPUT Cinducaoõ maghnhetica ad «2391 Se 2124 
debercmo Cid «Dãgd « Ro 12376 
LAR” CLA «rs r ta, cEdo 
igga INPUT “quantos enTrioiamenito . DEGE « Et 1282? 
Ss tem O Sel. “ix «0619 ES «3014 
ialil INFUT tensão individual da «SS == 92 LO 
secundario em valia Cri «ASS? 
1iD)IS INPUT COCrente individia! 22Ea PRINT í".6ES . 36R5 
So secunda. ih amperes i «Pisa cla Ao 7 ar 
ipia LEI mexa «10ASS Par = «td is 
1915 LET pazvti:o PRINT pot. do «0336 .30 SUS? 
ENTTDiA. ano em dy =", RO «ASAS 1 DO «soro 
117 LEI Pt=pt+po « DIVS SU «1BSB2 
1Biá LEI Kex-l «0275 35 “ASS 
iBei IF x::6 THEM GÓ TO jdil «ASA 1.90 . 69d 
idos PRINT “pot. de todos enro. & «23 1.95 15609 
No lim” PE a a pe ra De Lo. 19 z SE ts 
10cE LET s=1,.E+4+50R pt PRLNT ZE «2154 de LO La 0367 


CLUBE Zso 15 
158" , sado PRINT íC4.da l1>.5B6 

202s PRINT “1l.2d Eds RE jo &.E ES BOA 
18 .&7 las 1.227? 1.253 E. Sm 18. &05 
14.26 À é 0 RR gr, Lado so 15,904 
Ec DE... p RR: | Ls 1.194 4 .B lã .E19 
12.23 1. 4dW 1.699 1.053 4.5 153. 096 
Lies Ls QU La Tor 2.95? + LB «63 
9,393 1.54 e-âil y. 8931 Sa ES. ro 
E. Ud 1.74 DS.) Bctse Reco es, 421 
E io 1.509 E .345 D.BE 5. QB DB .e7á 
Bu0?7 1.98 E. SDS g. 6519 ú «o SS e ts 
Gale” 0.527" 

2934 PRINT “2.00 Sli ey4as PAUSE lSg: CLS 
22.520 oe. l 5. 4Bbd 2046 PRINT AT 5,53; CQuer impoimis 
S Ud Z.o E mi U A nar E PRINT AT q 
3.64 E so À «Los siº"voLta” ao tenhy q “. PRIN 
000 Eq o 4. 385 2d4 7 INPUT ag 
d.S6B =.5 E. SS 2043 IF ag='"i DR ag=0Iº THEN GO 
3.296 Em é 5. +26 TO 2951 
«056 2.5 B «. 150 oúvd 3 IF ag='no OR ag="Mº THEN GO 
E sao ps, e Cod E . EAS TO E 
PA [= 4 225% PRINT AT 5,5. ºErro na iniro 

2935 PRINT “3,0 DES dução da DPCcao, NE 
2.476 a od T e DO PRINT AT 7.3:."Introduza nova OF 
2.319 Sad D . Dio ccaõ. o PRIHT AT a,ú 
2. 176 é e S.Soa FAL 
e. Ads o «É GS. Brg SE 10 GO TO 23435 
1,927 DE ME = S,.821 28651 LFEFRINT “transa tar 
1.819 eis RA = lg. 175 EvO. Lldior 

4 1.719 Os É lã. 75 9998 STOP 

1.625 3 É EL. DA d 3939493 SAVE “iranaforo LINE à: FRI 
1.045 3.3 11,546 NT VERAPYO: VERLPT Ciramafor': 
1.455" CLS o: PRINT Esta bem aravadol 


Adapt.: por Roseira Coelho 


V. N. DE GAIA 
Chi-Yeung Choy de Ruislip dobra os seus dedos e realiza 20 BEEP x,19 
ar 219 FOR N=zl TO 12 
esta obra-prima musical. | 550 RERD B. BEEP Z,B-i2 
Até à bem pouco tempo o SPECTRUM era considerado pou- 539 NEXT N: RETURN 
frio 2io READ B.C,O 
co efectivo em qualquer aplicação musical razoável. Para lhe so BEEP Dix B45. BEEP X,U+45: EB 
provarmos o contrário apresentamos-lhe um programa que o EEP x,D+5: RETURN E 
fará reconsiderar a sua posição. o a rt! LET w=X/2: LET Z 
Em vez da selecção usual de efeitos de som ou de breves Sá o GU SUB 50 
lodi nhecidas Chi-Yeung programou, com sucesso, 500 READ B.C,D,E 
pena an Re | SEO BEEP X+7,B: BEEF Z,C: BEEP 
uma versão para computador do primeiro movimento da so- Zz,D: BEEP X,E: PAUSE 25 
nata de MOZART para piano em C Maior K 545. Ssva GU SUB SO 
É sey BEEP x,I19 
à O que é mais espantoso é que foi todo escrito em Basic e 590 FOR N=i TO 3 
funciona em 16K. sua BEEP A,19: GBEEP A,17: NEXT 
Foi dada uma atenção especial a todos os detalhes técnicos. dem 1a BEEP A,16: BEEP A,1i7: BEEP 
Dê aos seus dedos descanso e prazer aos seus ouvidos. x, Eh Rn a E 
Da | N= Q) so 
Comece Maestro! 630 READ E: BEEP Y,E 
bão FOR MN=z1 TO 
o a siga 5bSa READ B: BEEP Z,B: NEXT M: N 
So REM SONATA PARA PIANÚ Rads ExT N 
j dos co DE MULART BB GO SUB “QD 
1) CLS GO TO J008 bia GO SUB 1090 
oo READ B,C,U 6b5wo FOR N=1 TU = 
"bb BEEP 2+X,B: BEEP x,€; BEER 690 FOR N=1 TO 4 
X,Db: RES URN a 70M IF N=1 THEN BEEP Z,1: BEEP 
vo FOR M=1 TU ido Ze: GO TO 7260 
do RERD B: BEEP £,E 710 BEEP Z,O: BEEP Z,ê2 
So NEXT MM. RETURN ted NEXT M: NEXT N 
190 FOR N=1 TO 5 730 RESTORE 2120 
lla READ B: BEEF Y,B vã FOR N=1 TO 2 
led NEXT N e 7590 RESTORE 2120 
150 BEEP X,.1á: BEÉP X,19: BEEP 764 READ B.,C,D,E,F,G,H,L,J,R.L, 
K,?: PRUSE 28 M,P 
lãa RETURN 77a BEEP v,B: BEEP Y,C: BEEP x+ 
15) READ E.C.D,E,F o Y,D: BEEP Z,E: BEEP Z,F:; BECEP Y, 
 ABO BEEP Bsx,B, BCEP £,6: BEE G: BEEP vY,H: BEEP R,I: BEEP R.d: 
T+E,D: BEEP Z,E: BEEF vY+Z,F: RET BEEP A,K: BEEP A+rZ,il: BEEP ZM: 
LRN o 4 BEEP x,P: FAUSE SB 
172 FOR N=1 TO 12 700 NEXT N 
150 READ B. BEEP £,B 792 FOR N=1 TO 
159 NEXT N: RETURN sy GO SUE 78: NEXT N 


16 CLUBE Zso 

810 GO SUB 150 i470 BEEP v.19 

Seo DEEP Z,2w: BEEP X+Z,2e)1: BEE 1400 RESTORE 2510 

PA,25: BEEF A,21. BEEP A,20: BE i4Sa FOR N=1l TO lá 

EP N,2l: BEEP w,2d: GBEEP v,Z1: BE 1509 READ B: BEEP Z,B: NEXT N 
CEP Y,2a: BEEP Y,321 1519 FOR N=1 TO 15 

850 BEEP v,23: BEEP Y,19: BEEP 152zà BEEP AR,16: BEEP A,14. NEXT 
Z:X,26: BEEP Z,24: BEEP Z,23: BE A E 

EP £Z,e)2: BEEP Z,19 4950 BEEP Z,i2: BEEP Z,14: BEEP 
840 FOR N=1i TO à5 x,12 

859 BEEP A,23: BEEP A,21: NEXT 1S2ta RESTUORE 2180 

1550 FOR N=l TO IB | 

860 BEEP Z,19: BEEP Z,2i: BEEP 15690 READ B: BEEP Z,B-7: NEXT N 
X,19 15 “à BE Xsl2 

879 GO SUB 1? 135080 RESTURE 2130 

852 RESTORE 2180. GU SUB 200 1599 FOR N=1 TO 182 

8a CP X,?: BEEP X,23: BEEP X iBbvo READ B: BEEP Z,6B-19: NEXT N 
119: PAUSE 25 Lol) BEÉEP xXx,o: BEEP X,26: BEEP x 
900 BEEP X,7: GO SUE 170 13: PAUSE 25: 

910 RESTORE 2190: GO SUB 299 SIS LATA 12,16,19,1i,12,1d,12 
920 FOR N=1 TO & 2Qda DATA 21,19,24 

959 GO SUB 79: NEXT N SW DATA 9,11,12,14,16,17,19,21 
q40 BEEP X,17 :19,17,16,2d,12,11.9 

950 RESTORÉ 2190 2060 DATA 7,9,11,12,14,15,17,19, 
v6o FOR N=1 TO 12 EE E PR DR o DR E DR E; 

970 READ B: BEEP Z,B-5. NEXT N 2“"à LATA 5,7,9,11,12,14,16,17,12 
958) BEEP x,1d E, 4, EBs1Ãh,4,74340 

990 RESTORE 21994 SEU) CATA 4,5,7,9,11,12,14,16.,14 
1900 FOR N=i TO 12 118,11, 0,7;8,4 

1212 READ B: BEEP Z,B-17: NEXT N 22090 DATA 2,4,5,7,9,11,13,14,9,1 
1220 RESTORE 2220 1, 13,14,16,17,19 

12030 FOR N=1 TO 7 12d) DATA 21,25,24,25,21,19,17,1 
1240 GO SUB 70: NEXT N Std ei EM EE IM pe 

L19S0 RESTORE 2030. GU SUB 248 =llyú DARIA 11,19,16,12, 19,16, 
1962 RERD B,C,D,E = 

1iD7D BEEP X+r7,B+5: BEEP Z,0l+5: BE le DATA 26,293,19,21,23,21,19,2 
EEP Z,D+5: BEÉP X,E+4+5: PAÚSE 25 1,19,21,15,18,18 

1980 SU SUB sig 2130 DATA SO, Lado» , 414,86: 23.18, 
1290 BEEP x,2d 15,0,4,7,12,16,19,16 

1ildso FOR N=z1 TOS eldy DATA 24d,-3,9,6,59,24,21,18,1 
1119 GEEP A,2d: BEEP A,22: NEXT &,-L,2,6,11,14,158,14 
N E 2100 DATA Ed Dre Labs? 89, 43,46;, 
1129 BEEP A,21: BEEP A,22: BEEP 12,.-3,0,4,9, 12, 16,12 
Kel: PAUSE 25 21040 DATA El,eBbs,eS,e, Bb, LL, LB, dá, 
1130 FOR N=1 TO à 11,-5,-1,2,7,19,14,11 

1140 READ B: BEEP Yv,E4+5 Biro ÓDaIA 5,11,12,15,16. 

1156 FOR M=1 TO 1d 2189 DATA 15,14,19,253,26,253,19,2 
1160 READ B: BEEP Z,E+5 3,24,21,18,2i. R 

1170 NEXT M: NEXT N 2159 DATA 195,14,19,22,25,22,19,2 
11890 BEEP 2+x,21: PAUSE 25: BEEP S,ed,21,18,21 

x,e21 2d DATA E PAP = -li,.-12,-18, 
1198 BEEP 2 *x,193: FRUSE Es : BEE -B,-6,-5,19,22,21,19,17,1 Ep E 

XxX, 19 2219 DATA 19,218, -13,-11),"-18,-0, 
lavo BEEP 2+x,17: PAUSE 25: BEEP dado GATA 4 E Pos tS de, El, 19 

E e, S2Euú LATA 7 ,8,4,8,7 9,11, Lo, dA. 
12124 GEEP =Z+x, 16: PALSE 25: BEEP S,0,4,2,90,-1,-5 

X, 16 2250 DATA -d,11,12,14,156,18,20,2 
l22à RESTORE 2500 Led, c-d,-L,-D,-d,-?,- e 

1230 GO SUB 7U S2dg CATAR «12,01, 08,06,64,24,9i, 
1240 RESTURE 2100 L9,17,2,9,7,5,4,2,0 

1250 GU SUB 760: SU SUE I1dB eoS0 DATA -1,19,26,2d4,23,21,19,1 
1250 FOR N=1 TE) > C2dBb,0,2,5,4,2,0, -1 

1270 FOR M=1 TO 16 2269) DATA -5,17,24,25,21,19,17,1 
1200 IF N=2 THEN BEEP Z.5: BEER b,l4,-1,5.4,2,90,-1,-5 

£,*: GO TO 13090 s2"0 DATA -à,15,245.21,20,17,16,1 
1299 BEEP Z,6: BEEP Z,* as ER O RR e dy -=S 

1300 NEXT M: NEXT N Selo CATA -19, 14, 14,12,10,9,7,5, 
1319 FOR N=1 TO o sds tsS, 10,12, 14,16 

1329 RESTUORE 2120 Ze) DATA 14,13,214,13,14 

1339 READ Esses. .Asd ad Ratos 308 DATA la,e,4,5D,7,9,11,13,14, 
== | 9,11,13,14,16,17,26 

«sêãú BEEP vY,B-?: BEEP Y,C-?: BEE 2319 DATA 21,23,24,26,258,26,24d,2 
P X+Yr,D-7: DEEP Z,E-?: BEEP Z,F- S,284,19,17,168, 14,18 

*: BEEP Y,6=-7: BEEP Y,tis7: BEEP sed CLS : STOP 

H.I-?7:  'BEEP N,J-7: BEEP A,k-?: SB) PRINT BRIGHT A; 

CEP B+Z,l-?: BEEP Z,M-7: BEEP X ESTA A OUU 
P-": PAUSE SB IR à VERSRO SPECTRUM 

1354 NEXT N CA SÚ 
1360 FOR N=1 TO & MATA PARA PIANO 

1370 FOR N=1 TD 16 KS 
13890 READ B: BEEP £Z,B-*7 + DE HOZART 

.390 NEXT M: NEXT N dg 

igrua FOR N=1 TO 2 3910 PRINT AT 16,0; BRIGHT 2.º 
1412 FOR N=1 TO 16 

«2280 READ EB: DBDEEF £,B+5 TEMPO DE EXECUCAO 

1439 NEXT rá: HEXT N 

«4id RESTURE 2290 = MINUTOS E S&ã SEGUNDOS 

iáSa GO SUB 15% | gi 
liga BEEP 2+4x,21: BEEP Z,2y: BEE sda GO TÚ Sau 

P Y+Z,21: BEEP £,2ou: BEEÉEP Y+Z,2i 9980 SAVE “HOZARTO LINE 12 


EEE SE. EDS PI O DN OO SR RR SN 
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Autor: António Gomes Nunes 
FUNCHAL 


Todos os possuidores do ZX Microdrive são obrigados a exe- 
cutar um verdadeiro exercício de digitação sempre que pre- 
tendem carregar ou gravar um programa. Por exemplo 0 co- 
mando LOAD tem o seguinte formato, assumindo que se está 
a carregar a partir do drive n.º 1: 


LOAD *«m»;1;«nome do programa» 


Uma vez carregado o programa que a seguir se apresenta, O 
comando LOAD passa a fazer-se simplesmente com: 


*L «nome do programa» 
o que representa uma substancial redução do número de 
teclas a premir. 
Este programa, que utiliza a potencialidade da ROM do Inter- 
face 1 que nos permite definir novos comandos, compõe-se 
-ade duas partes, uma em BASIC e outra em linguagem 
máquina. 
Digite a parte em BASIC, apresentada seguidamente, e 
grave-a com SAVE *«m»;1;«run»>LINE 1. 


1 CLEAR 65373: LOAD *«m>»;1;«novcom»CODE : CLOSE II O: 
POKE 23735, 94: POKE 23736,255 

2 PRINT «Novos comandos:»"«*L LOAD»'«*S SAVE»"<*M 
MERGE>»'«*V VERIFY>'“O CAT»'«*R NEW & RUN» 


Quanto à parte em linguagem máquina, utilize o seguinte 
programa auxiliar para a sua entrada e gravação: 


1 REM Programa auxiliar para entrada do código máquina 
10 CLEAR 65373: LET c=0: RESTORE 100 
20 FOR i=-65374 TO 65535 
30 READ a: LET c=c+a: POKE ia 
40 NEXT | 
50 IF c<> 19482 THEN PRINT «Erro num DATA — corri- 

gir»: STOP 
* 60 SAVE *«m»;1;«novcom»CODE 653/4,162 
* 70 VERIFY *«m»;1;«novcom»CODE 65374,162 
80 PRINT «Código máquina OK» 
100 DATA 254,92,194,240,1,215,32,0 
110 DATA 246,32,254,115,40,22,254,108 
120 DATA 40,28,254,118,40,34,254,109 
130 DATA 40,36,254,99,40,38,254,114 
140 DATA 40,62,24,222,253,203,124,238 
150 DATA 205,199,255,195,54,8,253,203 
160 DATA 124,230,205,199,255,195,165,8 
170 DATA 253,203,124,254,24,244,253,203 
180 DATA 124,246,24,238,33,214,92,54 
190 DATA 1,35,54,0,35,54,2,215 
200 DATA 32,0,254,13,40,7,254,58 
210 DATA 40,3,205,30,6,195,169,4 
220 DATA 215,32,0,205,183,5,195,149 
230 DATA 10,62,77,50,217,92,215,32 
240 DATA 0,215,140,28,215,24,0,223 
250 DATA 202,35,7,215,241,43,62,10 
260 DATA 167,237,66,218,76,6,120,177 
270 DATA 202,76,6,62,1,50,214,92 
280 DATA 175,50,215,92,237,67,218,92 


290 DATA 237,83,220,92,215,24,0,195 
300 DATA 35,7 


Para testar o programa, faça NEW e RUN (lembre-se de que 
a parte em BASIC foi gravada com o nome «run»). 
Devem então aparecer no écran os novos comandos, os 
quais se referem ao Microdrive n.º 1. 

“1 (LOAD), *s (SAVE), *m (MERGE) e *v (VERIFY) devem 
ser seguidos do nome do programa, admitindo ainda as va- 
riantes habituais (CODE,DATA LINE). 

E pronto, a partir de agora pode esquecer os complicados 
formatos destes comandos, que obrigavam a uma considerá- 
ve! Ginástica de dedos! 

Por último refira-se que o reconhecimento destes novos co- 
mandos mantém-se activo desde que o programa em lingua- 
gem Máquina permanece inalterado na memória, e que O 
valor da variável do sistema VECTOR não seja modificado. 
Por isso, mesmo depois de carregar outro programa em BA- 
SIC com *1 «...» OS novos comandos mantém-se activos 
enquanto não fizer NEW. MAs mesmo depois de fazer NEW 
pode reactivar os comandos com POKE 23735,94:POKE 
23736,255 desde que a parte em linguagem máquina não 
tenha sido alterada. 


NO CLUBE Z 80 
(Os mais vendidos) 


1 — DEUS EX MACHINA 
2 — MACHINE CODE TUTOR 
3 — SHERLOCK HOLMES 
4 — TURMOIL 
5 — TRAVEL WITH TRASHMAN 
6 — THE INVERNO 
7 — BEACH HEAD 
8 — KNIGHT LORE 
9 — DARTES 
10 — CAVELON E VOLCANO 


TOP 10 EM INGLATERRA 


1 — GHOST BUSTERS 
2 — AIR WOLF 

3 — MATCH DAY 

4 — KNIGHT LORE 

5 — 3D STAR STRIKE 


6 — ELITE 
7 — STAFF OF KARNATH 
8 — SELECT 


9 — HUNCHBACK 
10 — DOOMDARK REVENGE 


== 


CLUBE Zso 


Autor: Hugo Assumpção 


«Todos sabem que um programa, quando gravado pelo 
Spectrum, tem duas partes: o cabeçalho ou header e o 
corpo. 

O cabeçalho, como já foi visto nas revistas anteriores n.º 18, 
pág. 14 e n.º 21, pág. 19, contém indicações para o compuia- 
dor, sobre o tipo de programa, nome, comprimento, onde 
começa a correr, etc. 

É necessário que o computador saiba exactamente onde, 
como e o que colocar na memória. 

Por isso usa o header. 

Já é do nosso conhecimento haver programas sem header. 
Como? Substituindo o cabeçalho. Como? Instruindo o 
computador, por meio de programas em código máquina, do 
tipo, comprimento e início do programa a carregar. 

Por isso é necessário saber correctamente o início e compri- 
mento. De outra forma é muito difícil conseguir um programa 
sem cabeçalho. 

Aqui vão duas rotinas em ASSEMBLER para SAVE e LOAD 
sem header. 


SAVE: 


1 — Carregar o acumulador com um byte 


marcador eg. 255 Id a, 255 
2 — Carregar o registro IX com oc endereço de 

início do programa ld IX, xxxx 
3 — Carregar o registro de com o n.º de bytes 

a gravar Id de, xxxx 
4 — Chamar a rotina da ROM no endereço 1218 call 1218 
5 — Regressar ao basic ret 
LOAD: 
1 — Activar carry flag scf 
2 — Carregar o acumulador com o byte marca- 

dor eg. 255 ld a, 255 


id IX, xxxx 
ld de, xxxx 


3 — Carregar IX com o endereço de início 
4 — Carregar de com o n.º de bytes a chamar 
5 — Chamar a rotina da ROM no endereço 1366 call 1366 


6 . Retorno ao basic ret 
SAVE LOAD 

ld a, xx (255) 62,xx scf 55 

id IX, xxx  221,33,xx,xx - Idaxx (255) 62,xx 

Id de, 300%  17)06x% ld 1X,xxxx 221,33 OC 

call 1218 205,194,4 id de,xxxx 17,xx,xx 

ret 201 call 1366 205,86,5 

ret 201 
Repare que as duas rotinas têm partes iguais. 
APLICAÇÃO: 


Ex.: Para Save ou Load de um Screen sem header, teríamos 

o seguinte programa BASIC, para guardar o CM.: 

10 DATA 55,62,255,221,33,0,64,17,0,27,205,0,0,201 4 

20 FOR N=23300 TO 23313: READ A: POKE NA: NEXT N 
RUN 

Colocada a rotina no Printer Buffer podemos usá-la fazendo: 

30 REM SAVE 

40 POKE 23311,194 : POKE 23312,4 : RANDOMIZE USR 
23301 : STOP 

50 REM LOAD 

60 POKE 23311,86 : POKE 23312,5 : RANDOMIZE USR 
23300 : STOP 


SAVE = GO TO 30 LOAD=GO TO 50 


INAIS DE TRÂNSITO 


Verifique ou recorde os seus conhecimentos sobre os 
sinais de trânsito com os testes que lhe são propostos. 
De excelente execução gráfica. 


2: 


S+visass SOSO DETE Cpó.B,0,0,255,8,0,.0.,8 
iiz 15S. E 
30868 DATA aa DO, Sd, SE,28,Zá 
= BO SEGUNDO Creu & ii 9S9B SAVE “R.EG.Dar.” LINE soca 
EB PRINT (TAB (RES SEN a+LEN DESAFIO — Resposta ao n.º 26, pág. 18 
“78 IF =] THE PRINT TRE dps António M. Bastos Pereira 
Sa PRINT TRE D;ap do S; 20 IF L>2+R OR L+R<O THEN PRINT AT 10,0;"'DA- 
; lBo IME UT “EGEFILIENTE DE &£PI € DOS INCORRECTOS ...ENTER" : PAUSE O: RUN 
126 IF b:8 THEN PRINT “+ dc 40 PRINT AT 10,0; /AREA= "AREA;” UM.72” 
A É “o dd te 3 ar turcas É rd 0 LEE ars 
17B IF c=B THEN PRINT = E FE Demonstração: 
: nho gaja — 1 E& =—: DDT Ri ds Teorema de Fiagaras 
196 IF cC<B TREN PRINT “- “;AES SE dept IRÃ) 
“La maio suo e no uma vez que y = L 1/2 em que 
18 LET d=brb-dsrasro Lf é o lado do rectângulo e R é 
ido REM PRINCICA Bloom a o raio de circunferência. 
E O ad SAR A a sir o Substituindo em (1) teremos: 
doit Bd a RE 1 no PR (===) x=+VR2 AM? rendo x = L2/2 
los6 PRINT tíCid 4 4 
IDE IF a<f BND Db: THEN LET E E considerando a Área do Rectângulo = L1 x L2 
TETE FOR q=1 TO LEMN STES a obtemos a Área = L1 *L2xWR2— L12/4 
RR er dude DESAFIO PROPOSTO: 
1156 MEXT no tm «UM PAR DE NÚMEROS NATURAIS DIZ-SE AMIGÁVEL 
a 1140 PRINT AT le. lE+INT O tihoBi L SE A SOMA DOS DIVISORES DE UM DELES (EXCEPTO 
Eae E q DIE ELE PRÓPRIO) É IGUAL AO OUTRO E VICE-VERSA 
5613 PRINT AT JE,S.RS =":AT 15 (por exemplo 220 e 284). 
LIL, -DESEN 34 | Estabelecer um programa que determine mais pares de 
Co do AE FHES PR dis: Fo sa números amigáveis! 
mis 8 Ma city: 
SOSO LET A=4+5EN ESLEN STRS b+q 
EST MaiZthi oo VENDO E TROCO 
2690 PRINT ET iE Gan c—s Programas para o SPECTRUM 48 K 
2j1ô PRINT AT 17, 12+INT UihrBi-l Contactar: LUÍS CAÇADOR 
EN STES RES. isa) «21, RBS izeralo Rua Miguel Bombarda, 105 
a ar Gu RR RA UE — 2830 BARREIRO — 
E aa DA Po os A 
MA or t=*+ PRAR ils it 
3620 PRUSE & 
3030 IP INKEVG:>"s GhD INKEYE 
“> THEN GOTO VENDO NDO 
SBdo SETOR 
5000 REM uds ZX SPECTRUM e INTERFACE 1 com MICRODRIVE 
Solo FESTORE 
geo FOR a=i TO GS PERO a é Contactar para: Rua de Serralves, 80 
2850 FOR t=D TO 7: PESD E 4100 PORTO 
Tuas POR USk ag+l,d Telefone 670511 


Ô, 
E 


20—————————[[[[[ [>— 


CLUBE Zso 


2 AR dl 
GILLIGANS GOLDS 


O objectivo deste jogo é apanhar o ouro existente em cada 
quadro e depositá-lo no carrinho de mão existente no primei- 
ro quadro.É preciso evitar os inimigos, ou seja, os outros 
bonecos, pois eles se nos alcançarem matam-nos. Evitar 
também as vagonetes de mina: um acidente com elas é 
mortal. Para nos defendermos dos ladrões, teremos que pe- 
gar a picareta e caminharmos contra eles, ou então pegar no 
ouro e deixá-lo cair em cima deles. Para evitar as vagonetes, 
temos que procurar no túnel em que eles rodam, sítios com 
uma seta. 

Aí, basta carregar na tecla para subir e na de apanhar objec- 
tos teremos evitado a vagonete. Nos quadros em que o ouro 
esteja atrás de paredes, teremos que pegar na pá e começar 
a escavar a parede. Ao passar de um quadro para o outro, e 
para evitar andar de trás para a frente com o ouro, podemos 
levar o carrinho de mão connosco, bastando para isso carre- 
gar na tecla para apanhar objectos e numa de direcção. 


TECLAS: Q — Esquerda P — Subir 
W — Direita ENTER — Descer 
SPACE — Apanhar, Lançar 


BLACK HAWK 


O objectivo deste jogo consiste em destruir as bases do ini- 
migo, assim como os seu radares, aviões, helicópteros, 
mísseis, etc.... Nós tripulamos um dos mais avançados 
aviões até agora construídos. Mas o inimigo é em grande 
número, por isso, este jogo é um jogo que essencialmente 
desafia a rapidez do jogador assim como os seus reflexos. 
Os quadros são alternados ora com o avião, ora com uma 
mina. Para disparar (com a mina), basta carregar no botão de 
disparo e, ao mesmo tempo, num dos botões de direcção. 
Seguidamente largam o botão de disparo e quando quiser- 
mos fixar a mina, largamos o botão de direcção. 
TECLAS: O — Esquerda O — Disparo 
P — Direita 
* O programa fornece bastantes instruções sobre os objectivos a destruir, 
armamento, etc.... 


VU-FILE 2 


Programa de arquivo idêntico ao primeiro VU-FILE, mas com 
uma vantagem de suportar 64 caracteres em cada linha. As 
instruções e operações definidas no VU-FILE 2 são as 
mesmas que no VU-FILE 1. 


BACK PACKERS 


O objectivo deste jogo é percorrer o labirinto à procura de 
seres aliegenes e recolhê-los. Devemos evitar as bolas que 
nos tiram energia sempre que chocam connosco. Precisamos 


recolher também as bolas com setas, que nos poderão indi- 
car direcção a seguir, assim como as chaves, que servem 
para abrir portas e barreiras ou barras de dinamite. Para 
afastar as bolas que nos aparecem em cada túnel podemos 
disparar uma arma laser, que as destrói. 


TECLAS: Q — Subir O — Esquerda 
A — Descer P — Direita 
M — Disparo/Apanhar objectos 


GRAND PRIX MANAGER 


Este jogo consiste na simulação de um grande campeonato 
automobilístico de velocidade. Você vai tomar o lugar à frente 
de uma equipa e terá que a gerir e comandar, tendo para 
isso que contratar mecânicos, pilotos, consertar automóveis 
e, o mais importante, ganhar dinheiro para as diversas eta- | 
pas do campeonato. 

O programa fornece as instruções necessárias para que se 
possa efectuar todo o tipo de provas, desde o contrato de 
pilotos até ao tipo de carros a escolher. 


LAZY JONES 


Este programa é novo no género, e um dos melhores actual- 
mente no mercado do ZX SPECTRUM. Consiste basica- 
mente de um écran no qual existem 18 portas, todas elas 
conduzindo a uma sala de vídeo ou a dependências utilitárias 
(quartos, w.c., etc.). Para que o Jones, que nós comanda- 
mos, possa entrar em cada um dos quartos e desenvolver a 
actividade inerente a cada um deles, tem que se carregar na 
tecla «M>. Ao começar o jogo o Jones aparece no piso do 
meio, e para evitar os guardas de cada um dos pisos, ele 
pode, ou entrar no elevador (tecla «M») e deslocar-se para O 
piso inferior ou superior, ou saltar por cima dos guardas, 
usando a tecla «Q». Não se pode entrar mais do que uma 
vez num mesmo quarto. q 
No jogo podem-se escolher o número de vidas que se quiser, 
entre 1 e 9. 


TECLAS: Q— Cima O-— Esquerda M— Disparo/Entrar 
A — Baixo P— Direita 


CYCLONE 


Este jogo pertence à mesma série do já famoso «TLL». Desta 
vez a aventura é com um helicóptero, que tem que andar a 
recolher cestos (grades) e salvar os sobreviventes do ciclone 
(bónus extra), devendo regressar o helicóptero à base depois 
de ter cumprido a missão. Há que ter cuidado com O vento, 
visto que com muito o helicóptero fica descontrolado e com o 
risco de se despenhar. O vento aumenta quando nos aproxi- 
mamos do ciclone. O jogo também contém um mapa, onde 
podemos ver as posições do helicóptero assim como as do 
ciclone. O programa fornece instruções acerca da aparelha- 
gem de controlo de bordo, assim como as teclas a utilizar. 
TECLAS: 1 - Subir 'O-Esquerda X - Mudar de direcção 

Q - Descer P -Direita M- Mapa 

N - Mudança de vista 


HE o 
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APPLE JAM 


Trata-se de um jogo de acção, constituído por um único 
écran onde se move um homenzinho cuja missão é apanhar 
com a boca as gotas de compota e as maçãs que caem de 
cima. Sempre que uma gota ou uma maçã cair no fundo do 
écran, um rato come-a e aumenta de tamanho. Ao fim de 
comer 3 itens, o rato sobe ao piso superior, onde está o 
homem, e tenta deitá-lo abaixo matando-o. A única defesa 
dele é entrar no elevador e fazer com que ele caia em cima 
do rato. Para o fazer, basta calcular o tempo que o elevador 
leva a subir e descer e carregar na tecla da esquerda, «5», 
que o elevador faz o resto. Sempre que o rato morre debaixo 
do elevador, o écran volta ao princípio, repetindo-se o 
mesmo processo, num nível superior e com mais interve- 
nientes: abelhas, moscas, etc. ... Sempre que o homem esti- 
ver muito gordo, ele terá que ir à sauna, bastando para isso 
carregar na tecla da direita, «8». 


TECLAS 5 - Esquerda 
8 - Direita 


H - Hold (para o jogo) 


” S3EAR GEORGE 


Trata-se de um dos melhor jogos para o SPECTRUM, tanto 
em questão de gráficos, como no jogo em si. O objectivo do 
jogo é conduzir o urso George para debaixo das macieiras de 
modo que ele coma o máximo de maçãs possível. Tem que 
se evitar os esquilos, que nos atiram com bolotas, que nos 
provocam uma grande «dor de cabeça» e também perda de 
peso. No fundo do écran existe um gráfico que nos indica o 
peso. Depois de se passar o primeiro quadro, temos de 
conduzir o urso George de um lado para o outro do écran, 
devendo evitar os esquiadores, que nos podem fazer perder 
vidas. O terceiro quadro é constituído por uma caverna que O 
urso George tem que atravessar, evitando as aranhas. Para 
as evitar temos que passar por baixo delas rapidamente 
(tecla para acelerar). 

Por fim o urso George chega à caverna onde irá hibernar. Se 
as maçãs que comeu chegarem para o alimentar durante a 
hibernação, o urso George voltará ao primeiro quadro, 
repetindo-se o mesmo esquema de jogo, com ligeiras modifi- 


a ce ' mo = 
” ações e num nível superior. Se não chegarem as maças 


que comeu, o urso George morre, terminando deste modo o 
jogo. 
TECLAS: Q — Subir a cabeça (d) 
A — Subir a cabeça (e) 
M —- Acelerar o passo 


| — Esquerda 
P — Direita 


CIRCUS 


Trata-se de uma aventura muitíssimo boa, que consegue 
coordenar o jogo com estratégia, a acção com a aventura e o 
raciocínio com o dinamismo. Como prefácio, podemos dizer 
que esta aventura começou com um aviso para o dono do 
circo de que ele não deveria dar mais nenhum espectáculo, 
senão ... É claro que o dono ficou assustado, e mais ainda 
quando começam a acontecer coisas estranhas no circo: 
mortes, roubos, etc.... 

A nosso missão é descobrir o culpado e acabar com esta 
onda de fenómenos inexplicáveis. 

Na aventura deverá utilizar termos o mais parecidos possível 
com um verdadeiro diálogo, tais como: 


Up—U 
Down — D 


North — N 
South — S 


West — W 
East — E etc... 


SYSTEM 15 000 


Este programa é uma simulação de «MODEM», em que o 
SPECTRUM terá que comunicar com outros computadores 
via telefónica, bastando para isso marcar um determinado 
número e esperar que ele estabeleça comunicação. Depois 
de estabelecida teremos que receber mensagens, descobrir 
o seu verdadeiro sentido, responder e continuar o mais 
possível a chamada, estabelecendo deste modo uma melhor 
comunicação entre o SPECTRUM e o outro computador. 


OLYMPIMANIA 


Este é um novo programa da série do «PYMANIA», as loucas 
aventuras do «Pl». Mais concretamente este jogo trata dos 
Jogos Olympicos malucos com este famoso e engraçado 
personagem, que é o «Pl». Com efeito, este simpático perso- 
nagem vai ter que realizar um determinado número de provas 
olímpicas com vista a uma qualificação (medalha de ouro, 
prata ou bronze). As provas podem ser: salto de obstáculos, 
esqui, hipismo, natação, etc. ... Mas, para dificultar um pou- 
co as provas, existem obstáculos pelo caminho (e não são 
poucos ...), assim como um inimigo em cada quadro. Para 
evitar os obstáculos e o inimigo, o «Pl» terá que saltar, acele- 
rar ou parar, consoante o caso. 

BOA SORTE! 

Para mover o «Pl», poder-se-á utilizar o «Joystick» ou as 
seguintes teclas: 


6 — Parar/Travar 8 — Saltar O — Avançar/Acelerar 


PSYTRAXX 


Este jogo é dos mais divertidos e difíceis que existem no 
mercado. Trata-se de mais um da série do «MICROBOT», 
mas cujo objectivo é bastante mais diverso: 1 microandroide 
tem que apanhar cartões-chave, passar para chegar a uma 
CPU muito especial: trata-se da CPU de um robot que domi- 
na um império — o império DROID — e que se tornou um 
autêntico tirano, construindo robots para o ajudarem a montar 
o império sobre o seu domínio, e que lhe obedeçam cega- 
mente. Para chegar a CPU, teremos portanto que evitar 
esses guardas, que poderão ter as mais diversas formas: 
microships, condensadores, transistores, resistores, eic.... e 
teremos também que lutar com a confusão gerada pelo impe- 
rador e provocada pelo grande número de divisões do palá- 
cio do imperador — cerca de 100 quadros diferentes! 
A— Subir O — Esquerda M — Disparar 

Z — Descer P — Direita H — Stop action 
Q-T — Apanhar, largar objectos 


DRAGONSBANE 


Mais um jogo de arcádia da QS. O objectivo deste novo jogo 
é destronar um feiticeiro que reina num temeroso castelo, 
protegido por terríveis seres e feitiços, os quais obedecem 
cegamente ao feiticeiro. Para nos protegermos destes peri- 
gos, teremos várias armas descritas no jogo, assim como 
objectos que formos apanhando no caminho. 

O programa descreve as teclas que são utilizadas no jogo, 
assim como a sua posição. 


MERCADO Z80 


O MERCADO Z80 É UMA SECÇÃO DO CLUBE Z80 QUE 
EMPRESA AOS SEUS SÓCIOS PROGRAMAS E LIVROS 
(SPECTRUM) PARA CONSULTA E MELHOR CONHECI- 
MENTO/APROVEITAMENO DE MICROCOMPUTADORES. 


— PROGRAMAS: Todos os jogos e utilitários que exis- 
tem no CLUBE Z80, excepto programas de cópia e 
programas com direitos de autor (Ex.: “Cálculo de 
Estruturas”). 


— LIVROS: Cerca de 40 títulos diferentes. 


COMO TORNAR-SE SÓCIO DO MERCADO Z80? 


Para poder ter em sua posse 5 cassetes ou livros durante um 
mês, basta enviar-nos um depósito de Esc. 2000800 (garantia 
de que os materiais nos serão devolvidos em estado de con- 
servação e funcionamento idêntico àquele em que foram 
enviados). 

Ao mesmo tempo, deverá remeter-nos a quantia de Esc. 
1000800 que será a base da sua “Conta-Corrente”. Essa 
quantia servirá para pagar as suas despesas: 


— Taxa de utilização dos produtos: 250800 (referente a 5 
unidades, entre livros e programas). 


— Instruções dos programas (no caso de o sócio não as 
devolver, debitar-lhe-emos 5$00 por folha). 


— Embalagem Postal: 20800 a 30800 (no caso de o pedi- 
do ser feito via CTT. 


— Portes dos CTT's: 40800 a 80$00 (no caso de o pedido 
ser feito via CTT. 


IMPORTANTE! 


— (O depósito de 2000800 pertence integralmente ao sócio 
desde que os materiais por ele utilizados nos sejam devol- 
vidos nas mesmas condições em que saíram do CLUBE 
Z80. Assim, quando o sócio desistir do MERCADO Z8o0, 
essa quantia ser-lhe-á entregue. 

Em caso de extravio, danos ou avarias dos materiais, O 
sócio pagará o valor comercial dos respectivos produtos (a 
descontar no depósito de 2000800). 


— No caso de os produtos seguirem via CTT, o sócio não 
pagará para levantar a encomenda. As despesas serão 
pagas por nós, no momento da expedição, e debitadas ao 
sócio (a descontar no depósito de 1000800). 


— Quando as suas despesas estiverem a atingir os 1000800 
avisá-lo-emos, e o sócio deverá renovar essa quantia de 
modo a cobrir despesas seguintes. 


— À taxa de utilização dos produtos é fixa — 250800. Ela 
refere-se ao conjunto de 5 unidades. (Pagará sempre 
250800 mesmo que peça só uma unidade). 


QUE PRODUTO E QUE QUANTIDADES? 


O sócio nunca pode pedir mais do que 5 unidades de cada vez 
(entre livros e cassetes). Quanto a livros não poderemos em- 
presar mais do que um. Assim, o sócio poderá pedir: 


— 5 cassettes 
ou 
— 4 cassettes + 1 livro 


QUAL O TEMPO DE UTILIZAÇÃO? 


O sócio poderá ficar com os produtos durante 1 MÊS, no 
máximo. Findo esse período, deverá devolvê-los ao CLUBE 
Z80. 

O MERCADO Z80 só atenderá dois pedidos por mês, para 
cada sócio. 


COMO FAZER O PEDIDO? 


Numa carta, escreva pelo menos 10 títulos (por ordem de 
prioridade). Se os 5 primeiros não estiverem disponíveis, en- 
viaremos os outros evitando grandes esperas de produtos que 
estejam em circulação. 

Ao devolver os produtos, inclua uma carta com o pedido 
seguinte. 


IMPORTANTE! O SÓCIO SÓ PODERÁ EFECTUAR UM 
NOVO PEDIDO JUNTAMENTE COM A DEVOLUÇÃO DO 
MATERIAL CORRESPONDENTE AO PEDIDO ANTERIOR 
(ou depois, se preferir). 


Se estiver interessado no MERCADO Z80, faça já o seu 1.º 
pedido, enviando 3000$00 e o cupão abaixo devidamente 
preenchido. 


INSCRIÇÃO NO MERCADO Z80 


NOME 
ENDEREÇO 
CÓDIGO POSTAL 
TELEFONE 


ENVIO 3 000800 (2 000$00 como garantia de que devolverei os produtos em boas condições + 1 000800 para a minha 


«Conta Corrente» em: 
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Cheque n.º Vale Postal Dinheiro 
Banco N.º 
Data  /. Jo. Assinatura do Sócio 
É SÓCIO DO CLUBE Z807? [] SIM [] NÃO 


CLUBE JÇZs 


INSCRIÇÃO COMO ASSOCIADO 


O CLUBE Zso está aberto a todos os utilizadores de microcomputadores. 
A intenção de associar os entusiastas das micro-máquinas, é exclusivamente a de permitir: 


1 — PUBLICAÇÃO DE UM JORNAL MENSAL, onde sejam publicados programas de uso geral ou específico 
como no caso da educação. 


2 — PROMOVER TROCAS DE PROGRAMAS, e trocas de experiências; tanto no caso do Software (programa- 
ção), como no caso do Hardware (electrónica). 


3 — PROMOVER DESCONTOS NA AQUISIÇÃO DE PROGRAMAS. 


4 — LANÇAR CURSOS DE PROGRAMAÇÃO EM BASIC — PASCAL OU OUTRAS LINGUAGENS E DIVULGAR 
O USO DE LINGUAGEM MÁQUINA. 
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